home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / biblio / tib / inputs / cmp.ttx < prev    next >
Text File  |  1989-03-28  |  11KB  |  147 lines

  1. %flag. author: title. journal volume pages (date), gov't no., other   (article)
  2. %flag. author: title. series. city: publisher date, gov't no., other  (book)
  3.  
  4. \Refstd\Citebrackets\Smallcapsaand%set general formats for reference list and citations
  5. \def\Titlefont{\Reffont}\def\Tomefont{\Reffont}\def\Volfont{\bf}%redefine some fonts
  6. \def\Flagstyle#1{\hangindent\parindent\indent\hbox to0pt{\hss{\Flagfont#1}.\kern.5em}}%flag style
  7. \def\Aand{, }\def\Aandd{, }\def\Eand{, }\def\Eandd{, }\def\aand{, }\def\aandd{, }\def\eand{, }\def\eandd{, }%redefine author, editor, etc. separators
  8.  
  9. \def\journalarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  10.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  11.                 \par\vfil\penalty-200\vfilneg%\filbreak
  12.       \if\Ftest\present\Flagstyle\Fstr\fi%
  13.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip: }\fi%
  14.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{\ }\fi%
  15.          \if\etest\present(\bgroup\estr\egroup)\def\Comma{\unskip\ }\fi%
  16.           \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{\ }\fi%
  17.            \if\Vtest\present\Comma\bgroup\Volfont\Vstr\egroup\def\Comma{, }\fi%
  18.             \if\Ptest\present\Comma\bgroup\Pstr\egroup\def\Comma{\ }\fi%
  19.              \if\Dtest\present\hskip.16667em(\bgroup\Dstr\egroup)\def\Comma{, }\fi%
  20.               \if\ttest\present. \bgroup\Titlefont\tstr\egroup\def\Comma{\ }\fi%
  21.                \if\jtest\present\if\ttest\present\Comma\else. \fi\bgroup\Tomefont\jstr\/\egroup\def\Comma{\ }\fi%
  22.                 \if\vtest\present\Comma\bgroup\Volfont\vstr\egroup\def\Comma{, }\fi%
  23.                  \if\ptest\present\Comma\bgroup\pstr\egroup\def\Comma{\ }\fi%
  24.                   \if\dtest\present\hskip.16667em(\bgroup\dstr\egroup)\def\Comma{, }\fi%
  25.  
  26.                    \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  27.                     \if\Otest\present\Comma\bgroup\Ostr\egroup\fi.%
  28.                      \vskip3ptplus1ptminus1pt}%\smallskip
  29.  
  30. \def\conferencereportformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  31.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  32.                 \par\vfil\penalty-200\vfilneg%\filbreak
  33.       \if\Ftest\present\Flagstyle\Fstr\fi%
  34.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip: }\fi%
  35.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{. }\fi%
  36.          \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{: }\fi%
  37.           \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\egroup\def\Comma{\ }\fi%
  38.  
  39.            \if\Dtest\present(\bgroup\Dstr\egroup)\def\Comma{, }\fi%
  40.             \if\Otest\present\Comma\bgroup\Ostr\egroup\fi.%
  41.              \vskip3ptplus1ptminus1pt}%\smallskip
  42.  
  43. \def\bookarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  44.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  45.                 \par\vfil\penalty-200\vfilneg%\filbreak
  46.       \if\Ftest\present\Flagstyle\Fstr\fi%
  47.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip: }\fi%
  48.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{. }\fi%
  49.          \if\etest\present\ (\bgroup\estr\egroup)\def\Comma{\unskip. }\fi%
  50.           \if\Btest\present\Comma\bgroup\Tomefont\Bstr\/\egroup\def\Comma{\unskip. }\fi%
  51.            \if\otest\present\ \bgroup\ostr\egroup\def\Comma{. }\fi%
  52.             \if\Etest\present, \bgroup\Estr\egroup\ifnum\Ecnt>1(eds.)\else (ed.)\fi\def\Comma{. }\fi%
  53.              \if\Ptest\present, \bgroup{\if\Pcnt\present pp.~\else p.~\fi}\Pstr\egroup\def\Comma{. }\fi%
  54.               \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
  55.                \if\Vtest\present\Comma\ Vol. \bgroup\Vstr\egroup\def\Comma{, }\fi%
  56.                 \if\Ntest\present\Comma\ No. \bgroup\Nstr\egroup\def\Comma{, }\fi%
  57.                  \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{: }\fi%
  58.                   \if\Itest\present\Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
  59.                    \if\Dtest\present\ \bgroup\Dstr\egroup\def\Comma{, }\fi%
  60.                     \if\ttest\present. \bgroup\Titlefont\Tstr\egroup\def\Comma{. }\fi%
  61.                      \if\btest\present\Comma\bgroup\Tomefont\bstr\egroup\def\Comma{. }\fi%
  62.                       \if\atest\present, \bgroup\astr\egroup\unskip, \if\acnt\present (eds.)\else (ed.)\fi\def\Comma{. }\fi%
  63.                        \if\ptest\present, {\if\pcnt\present pp.~\else p.~\fi}\pstr\def\Comma{. }\fi%
  64.                         \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
  65.                          \if\vtest\present\Comma\ Vol. \bgroup\vstr\egroup\def\Comma{, }\fi%
  66.                           \if\ntest\present\Comma\ No. \bgroup\nstr\egroup\def\Comma{, }\fi%
  67.                            \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{: }\fi%
  68.                             \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
  69.                              \if\dtest\present\ \bgroup\dstr\egroup\def\Comma{, }\fi%
  70.                               \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  71.                                \if\Otest\present\Comma\bgroup\Ostr\egroup\fi.%
  72.                                 \vskip3ptplus1ptminus1pt}%\smallskip
  73.  
  74. \def\bookformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  75.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  76.                 \par\vfil\penalty-200\vfilneg%\filbreak
  77.       \if\Ftest\present\Flagstyle\Fstr\fi%
  78.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip: }%
  79.             \else\if\Etest\present\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{: }%
  80.                   \else\if\Itest\present\bgroup\Authfont\Istr\egroup\def\Comma{: }\fi\fi\fi%
  81.           \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\/\egroup\def\Comma{\unskip. }%
  82.                 \else\if\Btest\present\Comma\bgroup\Titlefont\Bstr\/\egroup\def\Comma{\unskip. }\fi\fi%
  83.             \if\otest\present\ \bgroup\ostr\egroup\def\Comma{. }\fi%
  84.              \if\etest\present\ (\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
  85.               \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
  86.                \if\Vtest\present\Comma\ Vol. \bgroup\Vstr\egroup\def\Comma{, }\fi%
  87.                 \if\Ntest\present\Comma\ No. \bgroup\Nstr\egroup\def\Comma{, }\fi%
  88.                  \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{: }\fi%
  89.                   \if\Atest\present\if\Itest\present
  90.                           \Comma\bgroup\Istr\egroup\def\Comma{\unskip\ }\fi%
  91.                        \else\if\Etest\present\if\Itest\present
  92.                                \Comma\bgroup\Istr\egroup\def\Comma{\unskip\ }\fi\fi\fi%
  93.                        \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  94.                         \if\ttest\present. \bgroup\Titlefont\tstr\egroup\def\Comma{, }%
  95.                              \else\if\btest\present. \bgroup\Titlefont\bstr\egroup\def\Comma{, }\fi\fi%
  96.                           \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
  97.                            \if\vtest\present\Comma\bgroup\vstr\egroup\def\Comma{, }\fi%
  98.                             \if\ntest\present\Comma\bgroup\nstr\egroup\def\Comma{, }\fi%
  99.                              \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
  100.                               \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
  101.                                \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
  102.                                 \if\Gtest\present\Comma Gov't ordering no. \bgroup\Gstr\egroup\def\Comma{, }\fi%
  103.                                  \if\Otest\present\Comma\bgroup\Ostr\egroup\fi.%
  104.                                   \vskip3ptplus1ptminus1pt}%\smallskip
  105.  
  106. \def\technicalreportformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  107.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  108.                 \par\vfil\penalty-200\vfilneg%\filbreak
  109.       \if\Ftest\present\Flagstyle\Fstr\fi%
  110.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip: }%
  111.             \else\if\Etest\present\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\def\Comma{\unskip: }%
  112.                   \else\if\Itest\present\bgroup\Authfont\Istr\egroup\def\Comma{: }\fi\fi\fi%
  113.           \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  114.            \if\Atest\present\if\Itest\present
  115.                    \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
  116.                 \else\if\Etest\present\if\Itest\present
  117.                         \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
  118.             \if\Rtest\present\Comma\bgroup\Rstr\egroup\def\Comma{, }\fi%
  119.              \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  120.               \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  121.                \if\ttest\present. \bgroup\Titlefont\tstr\egroup\def\Comma{. }\fi%
  122.                 \if\rtest\present\bgroup\rstr\egroup\def\Comma{. }\fi%
  123.                  \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{: }\fi%
  124.                   \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{\ }\fi%
  125.                    \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
  126.                     \if\Gtest\present\Comma Gov't ordering no. \bgroup\Gstr\egroup\def\Comma{, }\fi%
  127.                      \if\Otest\present\Comma\bgroup\Ostr\egroup\fi.%
  128.                       \vskip3ptplus1ptminus1pt}%\smallskip
  129.  
  130. \def\otherformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  131.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  132.                 \par\vfil\penalty-200\vfilneg%\filbreak
  133.       \if\Ftest\present\Flagstyle\Fstr\fi%
  134.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip: }%
  135.             \else\if\Etest\present\def\Eand{\Aand}\def\Eandd{\Aandd}\bgroup\Authfont\Estr\egroup\def\Comma{\unskip: }%
  136.                   \else\if\Itest\present\bgroup\Authfont\Istr\egroup\def\Comma{: }\fi\fi\fi%
  137.           \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{. }\fi%
  138.             \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{: }\fi%
  139.              \if\Atest\present\if\Itest\present
  140.                      \Comma\bgroup\Istr\egroup\def\Comma{\ }\fi%
  141.                   \else\if\Etest\present\if\Itest\present
  142.                           \Comma\bgroup\Istr\egroup\def\Comma{\ }\fi\fi\fi%
  143.                   \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  144.                    \if\Gtest\present\Comma Gov't ordering no. \bgroup\Gstr\egroup\def\Comma{, }\fi%
  145.                     \if\Otest\present\Comma\bgroup\Ostr\egroup\fi.%
  146.                      \vskip3ptplus1ptminus1pt}%\smallskip
  147.